home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
PROGRAMM
/
CC_C
/
0562.ZIP
/
SUBPATH.BAT
< prev
Wrap
DOS Batch File
|
1987-03-29
|
1KB
|
37 lines
echo off
REM The next 2 lines form a first-time switch that simulates an exit from this
REM .bat routine (to SUBPAT, which is created in the basic program) and
REM then returns to the statement labeled :Endit, where files & stuff
REM get cleaned up.
if XX==%PATX% goto endit
set PATX=XX
if "%1==" goto help
goto next
:help
cls
echo SUBPATH will search for the requested pathname in the current
echo path, and, if found, delete it.
echo It is a good practice to issue a PATH command first, to
echo be certain of the exact form of the pathname you wish to delete.
echo SUBPATH will delete only an exact match as it appears between
echo semi-colons in the current PATH.
echo EXAMPLE:
echo To delete the pathname C:\UTIL
echo SUBPATH C:\UTIL
goto out
:next
path >subpath.dat
SET PAT=%1
REM Change the next line to include the full path to the SUBPATH.BAS
REM file if you wish to execute this routine from any other directory.
REM E.g., change it to BASICA C:\UTILITY\SUBPATH.BAS
REM Alternatively, if you compile SUBPATH.BAS
basica subpath.bas
SET PAT=
subpat
:ENDIT
SET PATX=
ERASE SUBPAT.BAT
:out